function localization_draw_point( node, node_type, only_energy)
  global S_Map;
  global f1;
    if nargin < 3  only_energy = 0;  end
    figure(f1);  X1=S_Map(node,1);  Y1=S_Map(node,2);  Z1=S_Map(node,3);  switch node_type
  case -1
  plot3(X1,Y1,Z1,'red.');  if ~only_energy  plot3(X1,Y1,300,'red.');  end
  case 0
  plot3(X1,Y1,Z1,'black.');  if ~only_energy  plot3(X1,Y1,300,'black.');  end
  case 1
  plot3(X1,Y1,Z1,'green.');  if ~only_energy  plot3(X1,Y1,300,'green.');  end
  case 2
  plot3(X1,Y1,Z1,'yellow.');  if ~only_energy  plot3(X1,Y1,300,'yellow.');  end
  end
 end
  